home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Game Zone - 1,000+ Games
/
GAMEZONE.BIN
/
Programs
/
Win
/
5-CARD POKER COLLECTION
/
32stud12.exe
/
STUDPOK.EXE
/
0
/
RCDATA
/
TFORM2
/
TFORM2.txt
< prev
Wrap
Text File
|
1998-06-11
|
10KB
|
286 lines
object Form2: TForm2
Left = 291
Top = 212
HelpContext = 41000
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
BorderStyle = bsSingle
Caption = '5-Card Stud Poker'
ClientHeight = 354
ClientWidth = 632
Color = clGreen
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Icon.Data = {<image000.ico>}
Menu = MainMenu1
Position = poScreenCenter
OnCreate = FormCreate
OnMouseUp = FormMouseUp
OnPaint = FormPaint
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 16
object BitBtn1: TBitBtn
Left = 424
Top = 188
Width = 97
Height = 65
HelpContext = 41000
Caption = '&Ante Up'
Default = True
TabOrder = 0
OnClick = BitBtn1Click
Glyph.Data = {
96010000424D9601000000000000760000002800000018000000180000000100
04000000000020010000CE0E0000C40E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222000
00222222222222222200CCCCFFFF0222222222222FFFCCCCFFFFFC0222222220
FFFFCCCCFFFFCCC02222222CFFFFFCCCFFFFCCCC022222CCCFFFFC4444FFCCCF
F02220CCCCFF44444444CCFFFF222CCCCCC4444444444FFFFF020FCCCC444444
44444FFFFCC20FFFCC444FF444F444CCCCC2FFFFF444F4FF44F444CCCCC0FFFF
F4444FF444F444CCCCC0CCCCC444FFF444F444FFFFF0CCCCC444F4F44FF444FF
FFF0CCCCCC444FF444F444FFFFF00CCFFF44444444444CCCFFF20FFFFFF44444
4444CCCCCC022FFFFFCCC444444FFCCCCC0220FFFCCCCFFFCCCFFFCCCC22220F
CCCCCFFFCCCFFFFCC2222220CCCCFFFFCCCFFFFF022222220CCCFFFFCCCCFFF2
2222222220CFFFFFCCCCF0222222222222200FFFCC0022222222}
Layout = blGlyphTop
end
object BitBtn2: TBitBtn
Left = 528
Top = 186
Width = 97
Height = 67
HelpContext = 41000
Caption = '&Bet'
Enabled = False
TabOrder = 1
OnClick = BitBtn2Click
Glyph.Data = {
16030000424D1603000000000000760000002800000038000000180000000100
040000000000A0020000CE0E0000C40E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222000
0022222222222222222222222222200000222222222222222200CCCCFFFF0222
22222222222222222200CCCCFFFF0222222222222FFFCCCCFFFFFC0222222222
222222222FFFCCCCFFFFFC0222222220FFFFCCCCFFFFCCC02222222222222220
FFFFCCCCFFFFCCC02222222CFFFFFCCCFFFFCCCC022222222222222CFFFFFCCC
FFFFCCCC022222CCCFFFFC4444FFCCCFF0222222222222CCCFFFFC4444FFCCCF
F02220CCCCFF44444444CCFFFF222222222220CCCCFF44444444CCFFFF222CCC
CCC4444444444FFFFF02222222222CCCCCC4444444444FFFFF020FCCCC444444
44444FFFFCC2222222220FCCCC44444444444FFFFCC20FFFCC444FF444F444CC
CCC2222222220FFFCC444FF444F444CCCCC2FFFFF444F4FF44F444CCCCC02222
2222FFFFF444F4FF44F444CCCCC0FFFFF4444FF444F444CCCCC022222222FFFF
F4444FF444F444CCCCC0CCCCC444FFF444F444FFFFF022222222CCCCC444FFF4
44F444FFFFF0CCCCC444F4F44FF444FFFFF022222222CCCCC444F4F44FF444FF
FFF0CCCCCC444FF444F444FFFFF022222222CCCCCC444FF444F444FFFFF00CCF
FF44444444444CCCFFF2222222220CCFFF44444444444CCCFFF20FFFFFF44444
4444CCCCCC02222222220FFFFFF444444444CCCCCC022FFFFFCCC444444FFCCC
CC02222222222FFFFFCCC444444FFCCCCC0220FFFCCCCFFFCCCFFFCCCC222222
222220FFFCCCCFFFCCCFFFCCCC22220FCCCCCFFFCCCFFFFCC22222222222220F
CCCCCFFFCCCFFFFCC2222220CCCCFFFFCCCFFFFF0222222222222220CCCCFFFF
CCCFFFFF022222220CCCFFFFCCCCFFF222222222222222220CCCFFFFCCCCFFF2
2222222220CFFFFFCCCCF022222222222222222220CFFFFFCCCCF02222222222
22200FFFCC002222222222222222222222200FFFCC0022222222}
Layout = blGlyphTop
end
object BitBtn3: TBitBtn
Left = 528
Top = 260
Width = 97
Height = 65
HelpContext = 41000
Cancel = True
Caption = 'E&xit'
ModalResult = 2
TabOrder = 2
Glyph.Data = {
4E010000424D4E01000000000000760000002800000011000000120000000100
040000000000D8000000CE0E0000C40E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
6666600000006668866666666666600000006691186666698666600000006691
1186669118666000000066911118691111866000000066691111811111866000
0000666691111111186660000000666669111111866660000000666666111118
6666600000006666669111186666600000006666691111186666600000006666
9111811186666000000066691118691118666000000066691186669111866000
0000666691666669111660000000666666666666919660000000666666666666
666660000000666666666666666660000000}
Layout = blGlyphTop
end
object BitBtn4: TBitBtn
Left = 424
Top = 258
Width = 97
Height = 67
HelpContext = 41000
Caption = '&Fold'
Default = True
Enabled = False
TabOrder = 3
OnClick = BitBtn4Click
Glyph.Data = {
6A030000424D6A030000000000007600000028000000370000001B0000000100
040000000000F4020000CE0E0000C40E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
6666666666666666666666666666666666666666666060000000000000000000
0000000000000000000000000000000000606000000000000000000000000000
0000000000000000000000000060600000000000000000000000000000000000
0000000000000000006060000000000000000000000000000000000000000000
0000000000606000000000000000000000000000000000000000000000000000
0060600000000000000000000000000000000000000000000000000000606000
BB10000000BB1000000BB100000BB10000BB1000000000000060600BB9B00000
0BB9B00000BB9B0000BB9B000BB9B00000000000006060BB9BBB0000BB9BBB00
0BB9BBB00BB9BBB0BB9BBB0000000000006060B9BBBB0000B9BBBB000B9BBBB0
0B9BBBB0B9BBBB00010001001060601BBBB1BB101BBBB1BB01BBBB1B01BBBB10
1BBBB1BB1010011110606011BB1B3BB011BB1B3B011BB1B3011BB1B011BB1B3B
B10001111060601111BBBB901111BBBB01111BBB01111BB01111BBBB9B010001
106060111193B190111193B10111193B01111930111193B193B0000010606011
111B1BB011111B1B011111B1011111B011111B1BBBB300010060601111111BB0
1111111B01111111011111101111111BB9BBB010006060111911919011191191
0111911901119110111911919BBBB10010606011191919101119191901119191
011191901119191913BB9B310060609999999990999999990999999909999990
99999999991993BB906060999999999099999999099999990999999099999999
999BB9B3906060999999999099999999099999990999999099999999999BBB99
90606099999999909999999909999999099999909999999999993B9990606099
9999999099999999099999990999999099999999999999999060609999999990
9999999909999999099999909999999999999999906060000000000000000000
0000000000000000000000000000000000606666666666666666666666666666
6666666666666666666666666660}
Layout = blGlyphTop
end
object Panel1: TPanel
Left = 0
Top = 330
Width = 632
Height = 24
Align = alBottom
Alignment = taLeftJustify
BevelOuter = bvNone
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
object Panel2: TPanel
Left = 200
Top = 1
Width = 144
Height = 24
BevelOuter = bvLowered
Caption = 'Credits:'
TabOrder = 0
end
object Panel3: TPanel
Left = 346
Top = 1
Width = 144
Height = 24
BevelOuter = bvLowered
Caption = 'Borrowed:'
TabOrder = 1
end
object Panel4: TPanel
Left = 0
Top = 1
Width = 198
Height = 24
BevelOuter = bvLowered
Caption = '5-Card Stud Poker'
TabOrder = 2
end
object Panel5: TPanel
Left = 492
Top = 1
Width = 142
Height = 24
BevelOuter = bvLowered
Caption = 'Current Bet:'
TabOrder = 3
end
end
object MainMenu1: TMainMenu
Left = 302
Top = 172
object File1: TMenuItem
Caption = '&File'
ShortCut = 0
object New1: TMenuItem
Caption = '&New'
ShortCut = 0
OnClick = New1Click
end
object N1: TMenuItem
Caption = '-'
ShortCut = 0
end
object Exit1: TMenuItem
Caption = 'E&xit'
ShortCut = 0
OnClick = Exit1Click
end
end
object Borrow1: TMenuItem
Caption = '&Borrow'
ShortCut = 0
OnClick = Borrow1Click
end
object Payoffs1: TMenuItem
Caption = '&Payoffs'
ShortCut = 0
OnClick = Payoffs1Click
end
object Register1: TMenuItem
Caption = '&Register'
ShortCut = 0
OnClick = Register1Click
end
object Help1: TMenuItem
Caption = '&Help'
ShortCut = 0
object About5CardStud1: TMenuItem
Caption = '&About 5-Card Stud'
ShortCut = 0
OnClick = About5CardStud1Click
end
object N2: TMenuItem
Caption = '-'
ShortCut = 0
end
object N5CardStudManual1: TMenuItem
Caption = '5-Card Stud &Manual'
ShortCut = 0
OnClick = N5CardStudManual1Click
end
object N3: TMenuItem
Caption = '-'
ShortCut = 0
end
object UltisoftProductCatalog1: TMenuItem
Caption = '&Ultisoft Product Catalog'
ShortCut = 0
OnClick = UltisoftProductCatalog1Click
end
object UltisoftHomepage1: TMenuItem
Caption = 'Ultisoft &Homepage'
ShortCut = 0
OnClick = UltisoftHomepage1Click
end
object FreeCDOffer1: TMenuItem
Caption = '&Free CD Offer'
ShortCut = 0
OnClick = FreeCDOffer1Click
end
object Special4995Offer1: TMenuItem
Caption = '&Special $49.95 Offer'
ShortCut = 0
OnClick = Special4995Offer1Click
end
end
end
end